function [t,x]=VecG(p,x)
% determina vectorul Gauss asociat unui vector x
% caruia ii anuleaza componentele x[p+1:n]
% t - vectorul Gauss
	x=x(:);      %vectorul este transformat in vector coloana
	n=length(x);
	t=zeros(n,1);
	t(p+1:n)=x(p+1:n)./x(p);
	x(p+1:n)=0;

endfunction
